#!/usr/bin/perl
$mytest = '/home/tandaica0612/Desktop/tuilatui.pl';
open (INFO,"<",$mytest) || die ("Ko the? mo? duoc. file nay");
while(<INFO>){
	print $_;
}
close (INFO);
